# systeminfo_tab.pl
# function for tabform

# load modules
require "./electric_bulletin_board-lib.pl";
require "./config.pl";


# systeminfo_tab()
# systeminfo tab generate functions
sub systeminfo_tab() {
	# configure form start
	print &ui_form_start("index.cgi", "get");
	
	# tab name
	print &ui_hidden("tab", "systeminfo");
	
	# table start
	@tds = ("width=20%", "width=40%");
	@bgcolor = ("bgcolor=\"#c6deea\"", "bgcolor=\"#a7f3cf\"");
	print &item_br();
	print &ui_columns_start(undef, 100, 1, \@tds);
	
	# product name row 
	print &ui_columns_row([$text{'systeminfo_productname_row'}, $module_info{'longdesc'}], \@bgcolor);
	
	# version row
	print &ui_columns_row([$text{'systeminfo_version_row'}, "Ver." . $module_info{'version'}], \@bgcolor);
	
	# producer row
	print &ui_columns_row([$text{'systeminfo_producer_row'}, "千葉工業大学電子工学研究会"], \@bgcolor);
	
	# device name row
	print &ui_columns_row([$text{'systeminfo_devicename_row'}, "電光掲示板 ちーばくん"], \@bgcolor);
	
	# connect port row
	print &ui_columns_row([$text{'systeminfo_portname_row'}, $config{'portname'}], \@bgcolor);
	
	# port speed row
	print &ui_columns_row([$text{'systeminfo_portspeed_row'}, $config{'portspeed'} . "bps"], \@bgcolor);
	
	# table end
	print &ui_columns_end();
	
	# run button
	print &item_br();
	print &ui_submit($text{'systeminfo_submit'});
	
	# configure form end
	print &ui_form_end();
}

# systeminfo_run()
# systeminfo run functions
sub systeminfo_run() {
	return;
}

